﻿Public Class frmModuloEvaluacion
    Dim Bitacora As New clsActividad
    Dim Usuario As New clsUsuarioPrincipal
    Private Sub DefiniciónDeParametrosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DefiniciónDeParametrosToolStripMenuItem.Click
        frmEvaluacionParamtros.ShowDialog()

    End Sub

    Private Sub frmModuloEvaluacion_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
        Bitacora.RegistraActividad("Cerró el Módulo de Evaluación")
        Usuario.Ubicacion("Ventana Principal")
    End Sub

    Private Sub frmModuloEvaluacion_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ToolStrip1.Cursor = Cursors.Hand
        ToolStrip1.RenderMode = System.Windows.Forms.ToolStripRenderMode.System

        Bitacora.RegistraActividad("Ingresó al Módulo de Evaluación")
        Usuario.Ubicacion("Módulo de Evaluación")

    End Sub

    Private Sub ToolStripButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton1.Click
        Close()

    End Sub

    Private Sub ServiciosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)


    End Sub

    Private Sub ToolStripButton5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton5.Click
        frmE_Evaluacion.ShowDialog()

    End Sub

    Private Sub NuevaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NuevaToolStripMenuItem.Click
        frmE_Evaluacion.ShowDialog()
    End Sub
End Class